******** Partisan Differences in Support for Political Violence: Results from a Natural Experiment in the United States
******** Analyses





* run the code below on the dataset "Vargiu Nai_SupportViolence_data.dta"





*** ANALYSES
****************************


*** Balance checks

tab female TREAT_1d, chi column
tab female TREAT_3d, chi column
tab female TREAT_7d, chi column
tab female TREAT, chi column

tab female TREAT_mang_1d, chi column
tab female TREAT_mang_3d, chi column
tab female TREAT_mang_7d, chi column
tab female TREAT_mang, chi column

tab female TREAT_larg_1d, chi column
tab female TREAT_larg_3d, chi column
tab female TREAT_larg_7d, chi column
tab female TREAT_larg, chi column

ttest age, by(TREAT_1d)
ttest age, by(TREAT_3d)
ttest age, by(TREAT_7d)
ttest age, by(TREAT)

ttest age, by(TREAT_mang_1d)
ttest age, by(TREAT_mang_3d)
ttest age, by(TREAT_mang_7d)
ttest age, by(TREAT_mang)

ttest age, by(TREAT_larg_1d)
ttest age, by(TREAT_larg_3d)
ttest age, by(TREAT_larg_7d)
ttest age, by(TREAT_larg)

tab urbrur TREAT_1d, chi column
tab urbrur TREAT_3d, chi column
tab urbrur TREAT_7d, chi column
tab urbrur TREAT, chi column

tab urbrur TREAT_mang_1d, chi column
tab urbrur TREAT_mang_3d, chi column
tab urbrur TREAT_mang_7d, chi column
tab urbrur TREAT_mang, chi column

tab urbrur TREAT_larg_1d, chi column
tab urbrur TREAT_larg_3d, chi column
tab urbrur TREAT_larg_7d, chi column
tab urbrur TREAT_larg, chi column

tab college TREAT_1d, chi column
tab college TREAT_3d, chi column
tab college TREAT_7d, chi column
tab college TREAT, chi column

tab college TREAT_mang_1d, chi column
tab college TREAT_mang_3d, chi column
tab college TREAT_mang_7d, chi column
tab college TREAT_mang, chi column

tab college TREAT_larg_1d, chi column
tab college TREAT_larg_3d, chi column
tab college TREAT_larg_7d, chi column
tab college TREAT_larg, chi column

tab PARTYID_dem TREAT_1d, chi column
tab PARTYID_dem TREAT_3d, chi column
tab PARTYID_dem TREAT_7d, chi column
tab PARTYID_dem TREAT, chi column

tab PARTYID_dem TREAT_mang_1d, chi column
tab PARTYID_dem TREAT_mang_3d, chi column
tab PARTYID_dem TREAT_mang_7d, chi column
tab PARTYID_dem TREAT_mang, chi column

tab PARTYID_dem TREAT_larg_1d, chi column
tab PARTYID_dem TREAT_larg_3d, chi column
tab PARTYID_dem TREAT_larg_7d, chi column
tab PARTYID_dem TREAT_larg, chi column



*** Excludability assumption

reg violence_index daynumber_w2 if inconsist==0
reg violence_support daynumber_w2 if inconsist==0
reg violence_justified daynumber_w2 if inconsist==0
reg violence_provoked daynumber_w2 if inconsist==0
reg violence_usual daynumber_w2 if inconsist==0
reg violence_charges daynumber_w2 if inconsist==0

   
   
*** Placebo tests

reg violence_index TREAT_placebo if inconsist==0
reg violence_support TREAT_placebo if inconsist==0
reg violence_justified TREAT_placebo if inconsist==0
reg violence_provoked TREAT_placebo if inconsist==0
reg violence_usual TREAT_placebo if inconsist==0
reg violence_charges TREAT_placebo if inconsist==0

ttest violence_index if inconsist==0, by(TREAT_placebo)
esize twosample violence_index if inconsist==0, by(TREAT_placebo) all

ttest violence_support if inconsist==0, by(TREAT_placebo)
esize twosample violence_support if inconsist==0, by(TREAT_placebo) all

ttest violence_justified if inconsist==0, by(TREAT_placebo)
esize twosample violence_justified if inconsist==0, by(TREAT_placebo) all

ttest violence_provoked if inconsist==0, by(TREAT_placebo)
esize twosample violence_provoked if inconsist==0, by(TREAT_placebo) all

ttest violence_usual if inconsist==0, by(TREAT_placebo)
esize twosample violence_usual if inconsist==0, by(TREAT_placebo) all

ttest violence_charges if inconsist==0, by(TREAT_placebo)
esize twosample violence_charges if inconsist==0, by(TREAT_placebo) all




* Figure 2

* T1
reg violence_index c.TREAT_1d if inconsist==0
estimates store index
reg violence_support c.TREAT_1d if inconsist==0
estimates store supp
reg violence_justified c.TREAT_1d if inconsist==0
estimates store just
reg violence_provoked c.TREAT_1d if inconsist==0
estimates store prov
reg violence_usual c.TREAT_1d if inconsist==0
estimates store usu
reg violence_charges c.TREAT_1d if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons PARTYID_dem) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_3d if inconsist==0
estimates store index
reg violence_support c.TREAT_3d if inconsist==0
estimates store supp
reg violence_justified c.TREAT_3d if inconsist==0
estimates store just
reg violence_provoked c.TREAT_3d if inconsist==0
estimates store prov
reg violence_usual c.TREAT_3d if inconsist==0
estimates store usu
reg violence_charges c.TREAT_3d if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.57))), ///
drop(_cons PARTYID_dem) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_7d if inconsist==0
estimates store index
reg violence_support c.TREAT_7d if inconsist==0
estimates store supp
reg violence_justified c.TREAT_7d if inconsist==0
estimates store just
reg violence_provoked c.TREAT_7d if inconsist==0
estimates store prov
reg violence_usual c.TREAT_7d if inconsist==0
estimates store usu
reg violence_charges c.TREAT_7d if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons PARTYID_dem) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT if inconsist==0
estimates store index
reg violence_support c.TREAT if inconsist==0
estimates store supp
reg violence_justified c.TREAT if inconsist==0
estimates store just
reg violence_provoked c.TREAT if inconsist==0
estimates store prov
reg violence_usual c.TREAT if inconsist==0
estimates store usu
reg violence_charges c.TREAT if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons PARTYID_dem) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(6) title("Before/After the killing", size(small) color(emerald)) subtitle("", size(small) color(emerald)) ///
xsize(20) ysize(10) name(AA, replace)

* T2
reg violence_index c.TREAT_mang_1d college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_1d college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_1d college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_1d college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_1d college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_1d college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons PARTYID_dem college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_3d college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_3d college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_3d college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_3d college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_3d college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_3d college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons PARTYID_dem college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_7d if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_7d if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_7d if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_7d if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_7d if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_7d if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons PARTYID_dem college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lgray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons PARTYID_dem college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(6) title("Before/After the arrest", size(small) color(lavender)) subtitle("", size(small) color(lavender)) ///
xsize(20) ysize(10) name(BB, replace)

* T3
reg violence_index c.TREAT_larg_1d if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_1d if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_1d if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_1d if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_1d if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_1d if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_3d college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_3d college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_3d college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_3d college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_3d college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_3d college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons PARTYID_dem college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_7d PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_7d PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_7d PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_7d PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_7d PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_7d PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons PARTYID_dem college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(6) title("Before the killing vs. After the arrest", size(small) color(sand)) subtitle("", size(small) color(sand)) ///
xsize(20) ysize(10) name(CC, replace)

*
grc1leg2 AA BB CC, col(1) scheme(lean2) position(6)



* Figure 3

* T1
reg violence_index c.TREAT_1d##c.PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_1d##c.PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_1d##c.PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_1d##c.PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_1d##c.PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_1d##c.PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))), ///
drop(_cons TREAT_1d PARTYID_dem) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_3d##c.PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_3d##c.PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_3d##c.PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_3d##c.PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_3d##c.PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_3d##c.PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))), ///
drop(_cons TREAT_3d PARTYID_dem) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_7d##c.PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_7d##c.PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_7d##c.PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_7d##c.PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_7d##c.PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_7d##c.PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))), ///
drop(_cons TREAT_7d PARTYID_dem) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT##c.PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT##c.PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT##c.PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT##c.PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT##c.PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT##c.PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT PARTYID_dem) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(6) title("Before/After the killing", size(small) color(emerald)) subtitle("", size(small) color(emerald)) ///
xsize(20) ysize(10) name(AA, replace)

* T2
reg violence_index c.TREAT_mang_1d##c.PARTYID_dem college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_1d##c.PARTYID_dem college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_1d##c.PARTYID_dem college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_1d##c.PARTYID_dem college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_1d##c.PARTYID_dem college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_1d##c.PARTYID_dem college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_1d PARTYID_dem college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_3d##c.PARTYID_dem college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_3d##c.PARTYID_dem college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_3d##c.PARTYID_dem college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_3d##c.PARTYID_dem college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_3d##c.PARTYID_dem college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_3d##c.PARTYID_dem college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_3d PARTYID_dem college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_7d##c.PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_7d##c.PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_7d##c.PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_7d##c.PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_7d##c.PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_7d##c.PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_7d PARTYID_dem college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang##c.PARTYID_dem college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang##c.PARTYID_dem college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang##c.PARTYID_dem college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang##c.PARTYID_dem college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang##c.PARTYID_dem college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang##c.PARTYID_dem college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang PARTYID_dem college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(6) title("Before/After the arrest", size(small) color(lavender)) subtitle("", size(small) color(lavender)) ///
xsize(20) ysize(10) name(BB, replace)

* T3
reg violence_index c.TREAT_larg_1d##c.PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_1d##c.PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_1d##c.PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_1d##c.PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_1d##c.PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_1d##c.PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))), ///
drop(_cons TREAT_larg_1d PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_3d##c.PARTYID_dem college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_3d##c.PARTYID_dem college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_3d##c.PARTYID_dem college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_3d##c.PARTYID_dem college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_3d##c.PARTYID_dem college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_3d##c.PARTYID_dem college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))), ///
drop(_cons TREAT_larg_3d PARTYID_dem college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_7d##c.PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_7d##c.PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_7d##c.PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_7d##c.PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_7d##c.PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_7d##c.PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_7d PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg##c.PARTYID_dem college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg##c.PARTYID_dem college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg##c.PARTYID_dem college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg##c.PARTYID_dem college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg##c.PARTYID_dem college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg##c.PARTYID_dem college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg PARTYID_dem college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(1) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(6) title("Before the killing vs. After the arrest", size(small) color(sand)) subtitle("", size(small) color(sand)) ///
xsize(20) ysize(10) name(CC, replace)

*
grc1leg2 AA BB CC, col(1) scheme(lean2) position(6)






* Figure 4 [ATTENTION: CREATES A NEW DATASET AT THE AGGREGATE LEVEL. ADJUST FILE PATHS]

*
clear
chdir "[FILEPATH]"
use "data.dta", replace	

sort daynumber_w2

collapse ///
(mean) violence_index2 violence_support violence_justified violence_charges violence_provoked violence_usual day month ///
, by(daynumber_w2)

/* days 41 and 42 have fewer than 10 obs, outliers */
gen outlier=0
replace outlier=1 if daynumber_w2==41
replace outlier=1 if daynumber_w2==42

cd "[FILEPATH]"
save "w2 aggregated by day - ALL.dta", replace	

*
clear
chdir "[FILEPATH]"
use "data.dta", replace	

sort daynumber_w2

keep if PARTYID_dem==1

collapse ///
(mean) violence_index2 violence_support violence_justified violence_charges violence_provoked violence_usual day month ///
, by(daynumber_w2)

/* days 41 and 42 have fewer than 10 obs, outliers */
gen outlier=0
replace outlier=1 if daynumber_w2==41
replace outlier=1 if daynumber_w2==42

gen DEM=1

cd "[FILEPATH]"
save "w2 aggregated by day - DEMS.dta", replace	

*
clear
chdir "[FILEPATH]"
use "data.dta", replace	

sort daynumber_w2

keep if PARTYID_dem==0

collapse ///
(mean) violence_index2 violence_support violence_justified violence_charges violence_provoked violence_usual day month ///
, by(daynumber_w2)

/* days 41 and 42 have fewer than 10 obs, outliers */
gen outlier=0
replace outlier=1 if daynumber_w2==41
replace outlier=1 if daynumber_w2==42

gen DEM=0

cd "[FILEPATH]"
save "w2 aggregated by day - REPS.dta", replace	

*
clear
chdir "[FILEPATH]"
use "w2 aggregated by day - DEMS.dta", replace	

append using "w2 aggregated by day - REPS.dta", force

cd "[FILEPATH]"
save "w2 aggregated by day - DEMSREPS.dta", replace

*
tsset DEM daynumber_w2

* Support for violence (index)
itsa violence_index if outlier==0, treat(1) trperiod(29; 34) lag(1) posttrend figure replace
graph save a, replace

* Could support the act
itsa violence_support if outlier==0, treat(1) trperiod(29; 34) lag(1) posttrend figure replace
graph save b, replace

* Act could be justified
itsa violence_justified if outlier==0, treat(1) trperiod(29; 34) lag(1) posttrend figure replace
graph save c, replace

* Was likely provoked
itsa violence_provoked if outlier==0, treat(1) trperiod(29; 34) lag(1) posttrend figure replace
graph save d, replace

* Happen all the time
itsa violence_usual if outlier==0, treat(1) trperiod(29; 34) lag(1) posttrend figure replace
graph save e, replace

* Should face criminal charges
itsa violence_charges if outlier==0, treat(1) trperiod(29; 34) lag(1) posttrend figure replace
graph save f, replace

* 
cd "[FILEPATH]"
graph combine "a" "b" "c" "d" "e" "f", col(2) scheme(lean2) xsize(12) ysize(15) 






*** APPENDIX C - FULL NUMERICAL RESULTS
****************************


* Table C.1

reg violence_index c.TREAT_1d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_support c.TREAT_1d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_justified c.TREAT_1d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	

reg violence_provoked c.TREAT_1d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_usual c.TREAT_1d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_charges c.TREAT_1d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	



* Table C.2

reg violence_index c.TREAT_3d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_support c.TREAT_3d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_justified c.TREAT_3d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	

reg violence_provoked c.TREAT_3d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_usual c.TREAT_3d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_charges c.TREAT_3d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	



* Table C.3

reg violence_index c.TREAT_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_support c.TREAT_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_justified c.TREAT_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	

reg violence_provoked c.TREAT_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_usual c.TREAT_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_charges c.TREAT_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	



* Table C.4

reg violence_index c.TREAT##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_support c.TREAT##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_justified c.TREAT##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	

reg violence_provoked c.TREAT##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_usual c.TREAT##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_charges c.TREAT##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	



* Table C.5

reg violence_index c.TREAT_mang_1d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_support c.TREAT_mang_1d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_justified c.TREAT_mang_1d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	

reg violence_provoked c.TREAT_mang_1d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_usual c.TREAT_mang_1d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_charges c.TREAT_mang_1d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	



* Table C.6

reg violence_index c.TREAT_mang_3d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_support c.TREAT_mang_3d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_justified c.TREAT_mang_3d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	

reg violence_provoked c.TREAT_mang_3d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_usual c.TREAT_mang_3d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_charges c.TREAT_mang_3d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	



* Table C.7

reg violence_index c.TREAT_mang_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_support c.TREAT_mang_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_justified c.TREAT_mang_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	

reg violence_provoked c.TREAT_mang_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_usual c.TREAT_mang_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_charges c.TREAT_mang_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	



* Table C.8

reg violence_index c.TREAT_mang##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_support c.TREAT_mang##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_justified c.TREAT_mang##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	

reg violence_provoked c.TREAT_mang##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_usual c.TREAT_mang##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_charges c.TREAT_mang##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	



* Table C.9

reg violence_index c.TREAT_larg_1d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_support c.TREAT_larg_1d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_justified c.TREAT_larg_1d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	

reg violence_provoked c.TREAT_larg_1d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_usual c.TREAT_larg_1d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_charges c.TREAT_larg_1d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	



* Table C.10

reg violence_index c.TREAT_larg_3d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_support c.TREAT_larg_3d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_justified c.TREAT_larg_3d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	

reg violence_provoked c.TREAT_larg_3d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_usual c.TREAT_larg_3d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_charges c.TREAT_larg_3d##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	



* Table C.11

reg violence_index c.TREAT_larg_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_support c.TREAT_larg_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_justified c.TREAT_larg_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	

reg violence_provoked c.TREAT_larg_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_usual c.TREAT_larg_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_charges c.TREAT_larg_7d##c.PARTYID_dem if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	



* Table C.12

reg violence_index c.TREAT_larg##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_support c.TREAT_larg##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_justified c.TREAT_larg##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	

reg violence_provoked c.TREAT_larg##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) replace ctitle(Model 1a)	
reg violence_usual c.TREAT_larg##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	
reg violence_charges c.TREAT_larg##c.PARTYID_dem college if inconsist==0
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(R2, e(r2)) append ctitle(Model 1a)	



* Table C.13 [[NOTE: USE AGGREGATED DATASET  "w2 aggregated by day - DEMSREPS.dta" CREATED FOR FIGURE 4]

itsa violence_index if outlier==0, treat(1) trperiod(29; 34) lag(1) posttrend figure replace
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(Log likelihood, e(ll)) replace ctitle(Model 1a)	



* Table C.14 [[NOTE: USE AGGREGATED DATASET  "w2 aggregated by day - DEMSREPS.dta" CREATED FOR FIGURE 4]

itsa violence_support if outlier==0, treat(1) trperiod(29; 34) lag(1) posttrend figure replace
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(Log likelihood, e(ll)) replace ctitle(Model 1a)	



* Table C.15 [[NOTE: USE AGGREGATED DATASET  "w2 aggregated by day - DEMSREPS.dta" CREATED FOR FIGURE 4]

itsa violence_justified if outlier==0, treat(1) trperiod(29; 34) lag(1) posttrend figure replace
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(Log likelihood, e(ll)) replace ctitle(Model 1a)	



* Table C.16 [[NOTE: USE AGGREGATED DATASET  "w2 aggregated by day - DEMSREPS.dta" CREATED FOR FIGURE 4]

itsa violence_provoked if outlier==0, treat(1) trperiod(29; 34) lag(1) posttrend figure replace
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(Log likelihood, e(ll)) replace ctitle(Model 1a)	



* Table C.17 [[NOTE: USE AGGREGATED DATASET  "w2 aggregated by day - DEMSREPS.dta" CREATED FOR FIGURE 4]

itsa violence_usual if outlier==0, treat(1) trperiod(29; 34) lag(1) posttrend figure replace
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(Log likelihood, e(ll)) replace ctitle(Model 1a)	



* Table C.18 [[NOTE: USE AGGREGATED DATASET  "w2 aggregated by day - DEMSREPS.dta" CREATED FOR FIGURE 4]

itsa violence_charges if outlier==0, treat(1) trperiod(29; 34) lag(1) posttrend figure replace
outreg2 using full1.doc, sideway stats(coef se pval) dec(2) pdec(3) noparen noaster addstat(Log likelihood, e(ll)) replace ctitle(Model 1a)	







*** APPENDIX D - ADDITIONAL RESULTS
****************************


* Figure D.2

graph bar violence_index, over(TREAT_placebo) name(a, replace) ///
scheme(lean2) yscale(range(0 100)) ylabel(0(20)100) ylabel(, labsize(small)) ///
title ("Support for violence (index)", size(medsmall) nospan) ///
subtitle ("t(1665)=-1.11, p=.270, d=0.05", size(medsmall)) ///
ytitle("Agree", size(small)) ///
xsize(10) ysize(10) legend(off) 

graph bar violence_support, over(TREAT_placebo) name(b, replace) ///
scheme(lean2) yscale(range(0 100)) ylabel(0(20)100) ylabel(, labsize(small)) ///
title ("Could support the act", size(medsmall) nospan) ///
subtitle ("t(1665)=-0.25, p=.805, d=0.01", size(medsmall)) ///
ytitle("Agree", size(small)) ///
xsize(10) ysize(10) legend(off)

graph bar violence_justified, over(TREAT_placebo) name(c, replace) ///
scheme(lean2) yscale(range(0 100)) ylabel(0(20)100) ylabel(, labsize(small)) ///
title ("Act could be justified", size(medsmall) nospan) ///
subtitle ("t(1665)=-0.26, p=.794, d=0.01", size(medsmall)) ///
ytitle("Agree", size(small)) ///
xsize(10) ysize(10) legend(off)

graph bar violence_provoked, over(TREAT_placebo) name(d, replace) ///
scheme(lean2) yscale(range(0 100)) ylabel(0(20)100) ylabel(, labsize(small)) ///
title ("Was likely provoked", size(medsmall) nospan) ///
subtitle ("t(1665)=-0.74, p=.462, d=0.04", size(medsmall)) ///
ytitle("Agree", size(small)) ///
xsize(10) ysize(10) legend(off)

graph bar violence_usual, over(TREAT_placebo) name(e, replace) ///
scheme(lean2) yscale(range(0 100)) ylabel(0(20)100) ylabel(, labsize(small)) ///
title ("Happen all the time", size(medsmall) nospan) ///
subtitle ("t(1665)=-1.30, p=.193, d=0.06", size(medsmall)) ///
ytitle("Agree", size(small)) ///
xsize(10) ysize(10) legend(off)

graph bar violence_charges, over(TREAT_placebo) name(f, replace) ///
scheme(lean2) yscale(range(0 100)) ylabel(0(20)100) ylabel(, labsize(small)) ///
title ("Should face criminal charges", size(medsmall) nospan) ///
subtitle ("t(1665)=1.89, p=.235, d=0.06", size(medsmall)) ///
ytitle("Agree", size(small)) ///
xsize(10) ysize(10) legend(off)

*
graph combine a b c d e f, col(2) scheme(lean2) xsize(10) ysize(15) title("", size(large) color(cranberry)) name(abcdef, replace)




* Figure D.3

* T1
reg violence_index c.TREAT_1d##c.poleff01 if inconsist==0
estimates store index
reg violence_support c.TREAT_1d##c.poleff01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_1d##c.poleff01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_1d##c.poleff01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_1d##c.poleff01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_1d##c.poleff01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_1d poleff01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_3d##c.poleff01 if inconsist==0
estimates store index
reg violence_support c.TREAT_3d##c.poleff01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_3d##c.poleff01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_3d##c.poleff01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_3d##c.poleff01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_3d##c.poleff01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_3d poleff01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_7d##c.poleff01 if inconsist==0
estimates store index
reg violence_support c.TREAT_7d##c.poleff01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_7d##c.poleff01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_7d##c.poleff01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_7d##c.poleff01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_7d##c.poleff01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_7d poleff01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT##c.poleff01 if inconsist==0
estimates store index
reg violence_support c.TREAT##c.poleff01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT##c.poleff01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT##c.poleff01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT##c.poleff01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT##c.poleff01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT poleff01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the killing", size(small) color(emerald)) subtitle("", size(small) color(emerald)) ///
xsize(20) ysize(10) name(AA, replace)

* T2
reg violence_index c.TREAT_mang_1d##c.poleff01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_1d##c.poleff01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_1d##c.poleff01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_1d##c.poleff01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_1d##c.poleff01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_1d##c.poleff01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_1d poleff01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_3d##c.poleff01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_3d##c.poleff01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_3d##c.poleff01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_3d##c.poleff01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_3d##c.poleff01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_3d##c.poleff01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_3d poleff01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_7d##c.poleff01 if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_7d##c.poleff01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_7d##c.poleff01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_7d##c.poleff01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_7d##c.poleff01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_7d##c.poleff01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_7d poleff01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang##c.poleff01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang##c.poleff01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang##c.poleff01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang##c.poleff01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang##c.poleff01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang##c.poleff01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang poleff01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the arrest", size(small) color(lavender)) subtitle("", size(small) color(lavender)) ///
xsize(20) ysize(10) name(BB, replace)

* T3
reg violence_index c.TREAT_larg_1d##c.poleff01 if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_1d##c.poleff01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_1d##c.poleff01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_1d##c.poleff01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_1d##c.poleff01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_1d##c.poleff01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_1d poleff01) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_3d##c.poleff01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_3d##c.poleff01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_3d##c.poleff01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_3d##c.poleff01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_3d##c.poleff01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_3d##c.poleff01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_3d poleff01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_7d##c.poleff01 PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_7d##c.poleff01 PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_7d##c.poleff01 PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_7d##c.poleff01 PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_7d##c.poleff01 PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_7d##c.poleff01 PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_7d poleff01 PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg##c.poleff01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg##c.poleff01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg##c.poleff01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg##c.poleff01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg##c.poleff01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg##c.poleff01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg poleff01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before the killing vs. After the arrest", size(small) color(sand)) subtitle("", size(small) color(sand)) ///
xsize(20) ysize(10) name(CC, replace)

*
graph combine AA BB CC, col(1) scheme(lean2) xsize(20) ysize(16)




* Figure D.4

* T1
reg violence_index c.TREAT_1d##c.reldepr01 if inconsist==0
estimates store index
reg violence_support c.TREAT_1d##c.reldepr01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_1d##c.reldepr01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_1d##c.reldepr01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_1d##c.reldepr01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_1d##c.reldepr01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_1d reldepr01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_3d##c.reldepr01 if inconsist==0
estimates store index
reg violence_support c.TREAT_3d##c.reldepr01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_3d##c.reldepr01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_3d##c.reldepr01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_3d##c.reldepr01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_3d##c.reldepr01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_3d reldepr01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_7d##c.reldepr01 if inconsist==0
estimates store index
reg violence_support c.TREAT_7d##c.reldepr01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_7d##c.reldepr01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_7d##c.reldepr01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_7d##c.reldepr01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_7d##c.reldepr01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_7d reldepr01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT##c.reldepr01 if inconsist==0
estimates store index
reg violence_support c.TREAT##c.reldepr01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT##c.reldepr01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT##c.reldepr01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT##c.reldepr01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT##c.reldepr01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT reldepr01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the killing", size(small) color(emerald)) subtitle("", size(small) color(emerald)) ///
xsize(20) ysize(10) name(AA, replace)

* T2
reg violence_index c.TREAT_mang_1d##c.reldepr01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_1d##c.reldepr01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_1d##c.reldepr01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_1d##c.reldepr01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_1d##c.reldepr01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_1d##c.reldepr01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_1d reldepr01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_3d##c.reldepr01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_3d##c.reldepr01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_3d##c.reldepr01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_3d##c.reldepr01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_3d##c.reldepr01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_3d##c.reldepr01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_3d reldepr01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_7d##c.reldepr01 if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_7d##c.reldepr01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_7d##c.reldepr01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_7d##c.reldepr01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_7d##c.reldepr01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_7d##c.reldepr01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_7d reldepr01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang##c.reldepr01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang##c.reldepr01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang##c.reldepr01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang##c.reldepr01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang##c.reldepr01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang##c.reldepr01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang reldepr01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the arrest", size(small) color(lavender)) subtitle("", size(small) color(lavender)) ///
xsize(20) ysize(10) name(BB, replace)

* T3
reg violence_index c.TREAT_larg_1d##c.reldepr01 if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_1d##c.reldepr01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_1d##c.reldepr01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_1d##c.reldepr01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_1d##c.reldepr01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_1d##c.reldepr01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_1d reldepr01) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_3d##c.reldepr01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_3d##c.reldepr01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_3d##c.reldepr01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_3d##c.reldepr01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_3d##c.reldepr01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_3d##c.reldepr01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_3d reldepr01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_7d##c.reldepr01 PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_7d##c.reldepr01 PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_7d##c.reldepr01 PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_7d##c.reldepr01 PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_7d##c.reldepr01 PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_7d##c.reldepr01 PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_7d reldepr01 PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg##c.reldepr01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg##c.reldepr01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg##c.reldepr01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg##c.reldepr01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg##c.reldepr01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg##c.reldepr01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg reldepr01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before the killing vs. After the arrest", size(small) color(sand)) subtitle("", size(small) color(sand)) ///
xsize(20) ysize(10) name(CC, replace)

*
graph combine AA BB CC, col(1) scheme(lean2) xsize(20) ysize(16)



* Figure D.5

* T1
reg violence_index c.TREAT_1d##c.nfchaos_w101 if inconsist==0
estimates store index
reg violence_support c.TREAT_1d##c.nfchaos_w101 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_1d##c.nfchaos_w101 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_1d##c.nfchaos_w101 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_1d##c.nfchaos_w101 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_1d##c.nfchaos_w101 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_1d nfchaos_w101) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_3d##c.nfchaos_w101 if inconsist==0
estimates store index
reg violence_support c.TREAT_3d##c.nfchaos_w101 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_3d##c.nfchaos_w101 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_3d##c.nfchaos_w101 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_3d##c.nfchaos_w101 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_3d##c.nfchaos_w101 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_3d nfchaos_w101) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_7d##c.nfchaos_w101 if inconsist==0
estimates store index
reg violence_support c.TREAT_7d##c.nfchaos_w101 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_7d##c.nfchaos_w101 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_7d##c.nfchaos_w101 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_7d##c.nfchaos_w101 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_7d##c.nfchaos_w101 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_7d nfchaos_w101) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT##c.nfchaos_w101 if inconsist==0
estimates store index
reg violence_support c.TREAT##c.nfchaos_w101 if inconsist==0
estimates store supp
reg violence_justified c.TREAT##c.nfchaos_w101 if inconsist==0
estimates store just
reg violence_provoked c.TREAT##c.nfchaos_w101 if inconsist==0
estimates store prov
reg violence_usual c.TREAT##c.nfchaos_w101 if inconsist==0
estimates store usu
reg violence_charges c.TREAT##c.nfchaos_w101 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT nfchaos_w101) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the killing", size(small) color(emerald)) subtitle("", size(small) color(emerald)) ///
xsize(20) ysize(10) name(AA, replace)

* T2
reg violence_index c.TREAT_mang_1d##c.nfchaos_w101 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_1d##c.nfchaos_w101 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_1d##c.nfchaos_w101 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_1d##c.nfchaos_w101 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_1d##c.nfchaos_w101 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_1d##c.nfchaos_w101 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.2 lavender*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.2 lavender*0.5))), ///
drop(_cons TREAT_mang_1d nfchaos_w101 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_3d##c.nfchaos_w101 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_3d##c.nfchaos_w101 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_3d##c.nfchaos_w101 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_3d##c.nfchaos_w101 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_3d##c.nfchaos_w101 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_3d##c.nfchaos_w101 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.2 lavender*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.2 lavender*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.2 lavender*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.2 lavender*0.5))), ///
drop(_cons TREAT_mang_3d nfchaos_w101 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_7d##c.nfchaos_w101 if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_7d##c.nfchaos_w101 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_7d##c.nfchaos_w101 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_7d##c.nfchaos_w101 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_7d##c.nfchaos_w101 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_7d##c.nfchaos_w101 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.2 lavender*0.5))), ///
drop(_cons TREAT_mang_7d nfchaos_w101 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang##c.nfchaos_w101 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang##c.nfchaos_w101 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang##c.nfchaos_w101 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang##c.nfchaos_w101 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang##c.nfchaos_w101 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang##c.nfchaos_w101 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.2 lavender*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.2 lavender*0.5))), ///
drop(_cons TREAT_mang nfchaos_w101 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the arrest", size(small) color(lavender)) subtitle("", size(small) color(lavender)) ///
xsize(20) ysize(10) name(BB, replace)

* T3
reg violence_index c.TREAT_larg_1d##c.nfchaos_w101 if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_1d##c.nfchaos_w101 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_1d##c.nfchaos_w101 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_1d##c.nfchaos_w101 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_1d##c.nfchaos_w101 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_1d##c.nfchaos_w101 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))), ///
drop(_cons TREAT_larg_1d nfchaos_w101) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_3d##c.nfchaos_w101 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_3d##c.nfchaos_w101 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_3d##c.nfchaos_w101 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_3d##c.nfchaos_w101 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_3d##c.nfchaos_w101 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_3d##c.nfchaos_w101 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))), ///
drop(_cons TREAT_larg_3d nfchaos_w101 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_7d##c.nfchaos_w101 PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_7d##c.nfchaos_w101 PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_7d##c.nfchaos_w101 PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_7d##c.nfchaos_w101 PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_7d##c.nfchaos_w101 PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_7d##c.nfchaos_w101 PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))), ///
drop(_cons TREAT_larg_7d nfchaos_w101 PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg##c.nfchaos_w101 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg##c.nfchaos_w101 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg##c.nfchaos_w101 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg##c.nfchaos_w101 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg##c.nfchaos_w101 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg##c.nfchaos_w101 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))), ///
drop(_cons TREAT_larg nfchaos_w101 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before the killing vs. After the arrest", size(small) color(sand)) subtitle("", size(small) color(sand)) ///
xsize(20) ysize(10) name(CC, replace)

*
graph combine AA BB CC, col(1) scheme(lean2) xsize(20) ysize(16)



* Figure D.6

* T1
reg violence_index c.TREAT_1d##c.poorhealth01 if inconsist==0
estimates store index
reg violence_support c.TREAT_1d##c.poorhealth01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_1d##c.poorhealth01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_1d##c.poorhealth01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_1d##c.poorhealth01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_1d##c.poorhealth01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))), ///
drop(_cons TREAT_1d poorhealth01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_3d##c.poorhealth01 if inconsist==0
estimates store index
reg violence_support c.TREAT_3d##c.poorhealth01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_3d##c.poorhealth01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_3d##c.poorhealth01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_3d##c.poorhealth01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_3d##c.poorhealth01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_3d poorhealth01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_7d##c.poorhealth01 if inconsist==0
estimates store index
reg violence_support c.TREAT_7d##c.poorhealth01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_7d##c.poorhealth01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_7d##c.poorhealth01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_7d##c.poorhealth01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_7d##c.poorhealth01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_7d poorhealth01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT##c.poorhealth01 if inconsist==0
estimates store index
reg violence_support c.TREAT##c.poorhealth01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT##c.poorhealth01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT##c.poorhealth01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT##c.poorhealth01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT##c.poorhealth01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT poorhealth01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the killing", size(small) color(emerald)) subtitle("", size(small) color(emerald)) ///
xsize(20) ysize(10) name(AA, replace)

* T2
reg violence_index c.TREAT_mang_1d##c.poorhealth01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_1d##c.poorhealth01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_1d##c.poorhealth01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_1d##c.poorhealth01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_1d##c.poorhealth01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_1d##c.poorhealth01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_1d poorhealth01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_3d##c.poorhealth01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_3d##c.poorhealth01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_3d##c.poorhealth01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_3d##c.poorhealth01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_3d##c.poorhealth01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_3d##c.poorhealth01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_3d poorhealth01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_7d##c.poorhealth01 if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_7d##c.poorhealth01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_7d##c.poorhealth01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_7d##c.poorhealth01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_7d##c.poorhealth01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_7d##c.poorhealth01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_7d poorhealth01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang##c.poorhealth01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang##c.poorhealth01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang##c.poorhealth01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang##c.poorhealth01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang##c.poorhealth01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang##c.poorhealth01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang poorhealth01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the arrest", size(small) color(lavender)) subtitle("", size(small) color(lavender)) ///
xsize(20) ysize(10) name(BB, replace)

* T3
reg violence_index c.TREAT_larg_1d##c.poorhealth01 if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_1d##c.poorhealth01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_1d##c.poorhealth01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_1d##c.poorhealth01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_1d##c.poorhealth01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_1d##c.poorhealth01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))), ///
drop(_cons TREAT_larg_1d poorhealth01) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_3d##c.poorhealth01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_3d##c.poorhealth01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_3d##c.poorhealth01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_3d##c.poorhealth01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_3d##c.poorhealth01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_3d##c.poorhealth01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_3d poorhealth01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_7d##c.poorhealth01 PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_7d##c.poorhealth01 PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_7d##c.poorhealth01 PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_7d##c.poorhealth01 PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_7d##c.poorhealth01 PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_7d##c.poorhealth01 PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_7d poorhealth01 PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg##c.poorhealth01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg##c.poorhealth01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg##c.poorhealth01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg##c.poorhealth01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg##c.poorhealth01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg##c.poorhealth01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg poorhealth01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before the killing vs. After the arrest", size(small) color(sand)) subtitle("", size(small) color(sand)) ///
xsize(20) ysize(10) name(CC, replace)

*
graph combine AA BB CC, col(1) scheme(lean2) xsize(20) ysize(16)



* Figure D.7

* T1
reg violence_index c.TREAT_1d##c.ageinyears01 if inconsist==0
estimates store index
reg violence_support c.TREAT_1d##c.ageinyears01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_1d##c.ageinyears01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_1d##c.ageinyears01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_1d##c.ageinyears01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_1d##c.ageinyears01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_1d ageinyears01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_3d##c.ageinyears01 if inconsist==0
estimates store index
reg violence_support c.TREAT_3d##c.ageinyears01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_3d##c.ageinyears01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_3d##c.ageinyears01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_3d##c.ageinyears01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_3d##c.ageinyears01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_3d ageinyears01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_7d##c.ageinyears01 if inconsist==0
estimates store index
reg violence_support c.TREAT_7d##c.ageinyears01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_7d##c.ageinyears01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_7d##c.ageinyears01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_7d##c.ageinyears01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_7d##c.ageinyears01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))), ///
drop(_cons TREAT_7d ageinyears01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT##c.ageinyears01 if inconsist==0
estimates store index
reg violence_support c.TREAT##c.ageinyears01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT##c.ageinyears01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT##c.ageinyears01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT##c.ageinyears01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT##c.ageinyears01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT ageinyears01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the killing", size(small) color(emerald)) subtitle("", size(small) color(emerald)) ///
xsize(20) ysize(10) name(AA, replace)

* T2
reg violence_index c.TREAT_mang_1d##c.ageinyears01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_1d##c.ageinyears01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_1d##c.ageinyears01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_1d##c.ageinyears01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_1d##c.ageinyears01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_1d##c.ageinyears01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_1d ageinyears01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_3d##c.ageinyears01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_3d##c.ageinyears01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_3d##c.ageinyears01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_3d##c.ageinyears01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_3d##c.ageinyears01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_3d##c.ageinyears01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_3d ageinyears01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_7d##c.ageinyears01 if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_7d##c.ageinyears01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_7d##c.ageinyears01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_7d##c.ageinyears01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_7d##c.ageinyears01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_7d##c.ageinyears01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_7d ageinyears01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang##c.ageinyears01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang##c.ageinyears01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang##c.ageinyears01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang##c.ageinyears01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang##c.ageinyears01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang##c.ageinyears01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang ageinyears01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the arrest", size(small) color(lavender)) subtitle("", size(small) color(lavender)) ///
xsize(20) ysize(10) name(BB, replace)

* T3
reg violence_index c.TREAT_larg_1d##c.ageinyears01 if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_1d##c.ageinyears01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_1d##c.ageinyears01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_1d##c.ageinyears01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_1d##c.ageinyears01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_1d##c.ageinyears01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_1d ageinyears01) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_3d##c.ageinyears01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_3d##c.ageinyears01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_3d##c.ageinyears01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_3d##c.ageinyears01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_3d##c.ageinyears01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_3d##c.ageinyears01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))), ///
drop(_cons TREAT_larg_3d ageinyears01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_7d##c.ageinyears01 PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_7d##c.ageinyears01 PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_7d##c.ageinyears01 PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_7d##c.ageinyears01 PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_7d##c.ageinyears01 PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_7d##c.ageinyears01 PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_7d ageinyears01 PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg##c.ageinyears01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg##c.ageinyears01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg##c.ageinyears01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg##c.ageinyears01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg##c.ageinyears01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg##c.ageinyears01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg ageinyears01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before the killing vs. After the arrest", size(small) color(sand)) subtitle("", size(small) color(sand)) ///
xsize(20) ysize(10) name(CC, replace)

*
graph combine AA BB CC, col(1) scheme(lean2) xsize(20) ysize(16)



* Figure D.8

* T1
reg violence_index c.TREAT_1d##c.aggress01 if inconsist==0
estimates store index
reg violence_support c.TREAT_1d##c.aggress01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_1d##c.aggress01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_1d##c.aggress01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_1d##c.aggress01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_1d##c.aggress01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_1d aggress01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_3d##c.aggress01 if inconsist==0
estimates store index
reg violence_support c.TREAT_3d##c.aggress01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_3d##c.aggress01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_3d##c.aggress01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_3d##c.aggress01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_3d##c.aggress01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))), ///
drop(_cons TREAT_3d aggress01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_7d##c.aggress01 if inconsist==0
estimates store index
reg violence_support c.TREAT_7d##c.aggress01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_7d##c.aggress01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_7d##c.aggress01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_7d##c.aggress01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_7d##c.aggress01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_7d aggress01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT##c.aggress01 if inconsist==0
estimates store index
reg violence_support c.TREAT##c.aggress01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT##c.aggress01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT##c.aggress01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT##c.aggress01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT##c.aggress01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT aggress01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the killing", size(small) color(emerald)) subtitle("", size(small) color(emerald)) ///
xsize(20) ysize(10) name(AA, replace)

* T2
reg violence_index c.TREAT_mang_1d##c.aggress01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_1d##c.aggress01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_1d##c.aggress01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_1d##c.aggress01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_1d##c.aggress01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_1d##c.aggress01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_1d aggress01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_3d##c.aggress01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_3d##c.aggress01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_3d##c.aggress01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_3d##c.aggress01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_3d##c.aggress01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_3d##c.aggress01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_3d aggress01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_7d##c.aggress01 if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_7d##c.aggress01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_7d##c.aggress01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_7d##c.aggress01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_7d##c.aggress01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_7d##c.aggress01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_7d aggress01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang##c.aggress01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang##c.aggress01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang##c.aggress01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang##c.aggress01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang##c.aggress01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang##c.aggress01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang aggress01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the arrest", size(small) color(lavender)) subtitle("", size(small) color(lavender)) ///
xsize(20) ysize(10) name(BB, replace)

* T3
reg violence_index c.TREAT_larg_1d##c.aggress01 if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_1d##c.aggress01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_1d##c.aggress01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_1d##c.aggress01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_1d##c.aggress01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_1d##c.aggress01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_1d aggress01) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_3d##c.aggress01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_3d##c.aggress01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_3d##c.aggress01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_3d##c.aggress01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_3d##c.aggress01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_3d##c.aggress01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_3d aggress01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_7d##c.aggress01 PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_7d##c.aggress01 PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_7d##c.aggress01 PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_7d##c.aggress01 PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_7d##c.aggress01 PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_7d##c.aggress01 PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_7d aggress01 PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg##c.aggress01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg##c.aggress01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg##c.aggress01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg##c.aggress01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg##c.aggress01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg##c.aggress01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg aggress01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before the killing vs. After the arrest", size(small) color(sand)) subtitle("", size(small) color(sand)) ///
xsize(20) ysize(10) name(CC, replace)

*
graph combine AA BB CC, col(1) scheme(lean2) xsize(20) ysize(16)



* Figure D.9

* T1
reg violence_index c.TREAT_1d##c.drktetr_psycho01 if inconsist==0
estimates store index
reg violence_support c.TREAT_1d##c.drktetr_psycho01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_1d##c.drktetr_psycho01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_1d##c.drktetr_psycho01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_1d##c.drktetr_psycho01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_1d##c.drktetr_psycho01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_1d drktetr_psycho01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_3d##c.drktetr_psycho01 if inconsist==0
estimates store index
reg violence_support c.TREAT_3d##c.drktetr_psycho01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_3d##c.drktetr_psycho01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_3d##c.drktetr_psycho01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_3d##c.drktetr_psycho01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_3d##c.drktetr_psycho01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))), ///
drop(_cons TREAT_3d drktetr_psycho01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_7d##c.drktetr_psycho01 if inconsist==0
estimates store index
reg violence_support c.TREAT_7d##c.drktetr_psycho01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_7d##c.drktetr_psycho01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_7d##c.drktetr_psycho01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_7d##c.drktetr_psycho01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_7d##c.drktetr_psycho01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_7d drktetr_psycho01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT##c.drktetr_psycho01 if inconsist==0
estimates store index
reg violence_support c.TREAT##c.drktetr_psycho01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT##c.drktetr_psycho01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT##c.drktetr_psycho01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT##c.drktetr_psycho01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT##c.drktetr_psycho01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT drktetr_psycho01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the killing", size(small) color(emerald)) subtitle("", size(small) color(emerald)) ///
xsize(20) ysize(10) name(AA, replace)

* T2
reg violence_index c.TREAT_mang_1d##c.drktetr_psycho01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_1d##c.drktetr_psycho01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_1d##c.drktetr_psycho01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_1d##c.drktetr_psycho01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_1d##c.drktetr_psycho01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_1d##c.drktetr_psycho01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_1d drktetr_psycho01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_3d##c.drktetr_psycho01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_3d##c.drktetr_psycho01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_3d##c.drktetr_psycho01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_3d##c.drktetr_psycho01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_3d##c.drktetr_psycho01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_3d##c.drktetr_psycho01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_3d drktetr_psycho01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_7d##c.drktetr_psycho01 if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_7d##c.drktetr_psycho01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_7d##c.drktetr_psycho01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_7d##c.drktetr_psycho01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_7d##c.drktetr_psycho01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_7d##c.drktetr_psycho01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_7d drktetr_psycho01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang##c.drktetr_psycho01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang##c.drktetr_psycho01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang##c.drktetr_psycho01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang##c.drktetr_psycho01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang##c.drktetr_psycho01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang##c.drktetr_psycho01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang drktetr_psycho01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the arrest", size(small) color(lavender)) subtitle("", size(small) color(lavender)) ///
xsize(20) ysize(10) name(BB, replace)

* T3
reg violence_index c.TREAT_larg_1d##c.drktetr_psycho01 if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_1d##c.drktetr_psycho01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_1d##c.drktetr_psycho01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_1d##c.drktetr_psycho01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_1d##c.drktetr_psycho01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_1d##c.drktetr_psycho01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_1d drktetr_psycho01) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_3d##c.drktetr_psycho01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_3d##c.drktetr_psycho01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_3d##c.drktetr_psycho01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_3d##c.drktetr_psycho01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_3d##c.drktetr_psycho01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_3d##c.drktetr_psycho01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_3d drktetr_psycho01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_7d##c.drktetr_psycho01 PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_7d##c.drktetr_psycho01 PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_7d##c.drktetr_psycho01 PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_7d##c.drktetr_psycho01 PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_7d##c.drktetr_psycho01 PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_7d##c.drktetr_psycho01 PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_7d drktetr_psycho01 PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg##c.drktetr_psycho01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg##c.drktetr_psycho01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg##c.drktetr_psycho01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg##c.drktetr_psycho01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg##c.drktetr_psycho01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg##c.drktetr_psycho01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg drktetr_psycho01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before the killing vs. After the arrest", size(small) color(sand)) subtitle("", size(small) color(sand)) ///
xsize(20) ysize(10) name(CC, replace)

*
graph combine AA BB CC, col(1) scheme(lean2) xsize(20) ysize(16)



* Figure D.10

* T1
reg violence_index c.TREAT_1d##c.drktetr_nar01 if inconsist==0
estimates store index
reg violence_support c.TREAT_1d##c.drktetr_nar01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_1d##c.drktetr_nar01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_1d##c.drktetr_nar01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_1d##c.drktetr_nar01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_1d##c.drktetr_nar01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_1d drktetr_nar01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_3d##c.drktetr_nar01 if inconsist==0
estimates store index
reg violence_support c.TREAT_3d##c.drktetr_nar01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_3d##c.drktetr_nar01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_3d##c.drktetr_nar01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_3d##c.drktetr_nar01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_3d##c.drktetr_nar01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_3d drktetr_nar01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_7d##c.drktetr_nar01 if inconsist==0
estimates store index
reg violence_support c.TREAT_7d##c.drktetr_nar01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_7d##c.drktetr_nar01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_7d##c.drktetr_nar01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_7d##c.drktetr_nar01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_7d##c.drktetr_nar01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_7d drktetr_nar01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT##c.drktetr_nar01 if inconsist==0
estimates store index
reg violence_support c.TREAT##c.drktetr_nar01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT##c.drktetr_nar01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT##c.drktetr_nar01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT##c.drktetr_nar01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT##c.drktetr_nar01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT drktetr_nar01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the killing", size(small) color(emerald)) subtitle("", size(small) color(emerald)) ///
xsize(20) ysize(10) name(AA, replace)

* T2
reg violence_index c.TREAT_mang_1d##c.drktetr_nar01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_1d##c.drktetr_nar01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_1d##c.drktetr_nar01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_1d##c.drktetr_nar01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_1d##c.drktetr_nar01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_1d##c.drktetr_nar01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_1d drktetr_nar01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_3d##c.drktetr_nar01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_3d##c.drktetr_nar01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_3d##c.drktetr_nar01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_3d##c.drktetr_nar01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_3d##c.drktetr_nar01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_3d##c.drktetr_nar01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_3d drktetr_nar01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_7d##c.drktetr_nar01 if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_7d##c.drktetr_nar01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_7d##c.drktetr_nar01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_7d##c.drktetr_nar01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_7d##c.drktetr_nar01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_7d##c.drktetr_nar01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_7d drktetr_nar01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang##c.drktetr_nar01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang##c.drktetr_nar01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang##c.drktetr_nar01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang##c.drktetr_nar01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang##c.drktetr_nar01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang##c.drktetr_nar01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang drktetr_nar01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the arrest", size(small) color(lavender)) subtitle("", size(small) color(lavender)) ///
xsize(20) ysize(10) name(BB, replace)

* T3
reg violence_index c.TREAT_larg_1d##c.drktetr_nar01 if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_1d##c.drktetr_nar01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_1d##c.drktetr_nar01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_1d##c.drktetr_nar01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_1d##c.drktetr_nar01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_1d##c.drktetr_nar01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_1d drktetr_nar01) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_3d##c.drktetr_nar01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_3d##c.drktetr_nar01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_3d##c.drktetr_nar01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_3d##c.drktetr_nar01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_3d##c.drktetr_nar01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_3d##c.drktetr_nar01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_3d drktetr_nar01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_7d##c.drktetr_nar01 PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_7d##c.drktetr_nar01 PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_7d##c.drktetr_nar01 PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_7d##c.drktetr_nar01 PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_7d##c.drktetr_nar01 PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_7d##c.drktetr_nar01 PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_7d drktetr_nar01 PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg##c.drktetr_nar01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg##c.drktetr_nar01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg##c.drktetr_nar01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg##c.drktetr_nar01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg##c.drktetr_nar01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg##c.drktetr_nar01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg drktetr_nar01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before the killing vs. After the arrest", size(small) color(sand)) subtitle("", size(small) color(sand)) ///
xsize(20) ysize(10) name(CC, replace)

*
graph combine AA BB CC, col(1) scheme(lean2) xsize(20) ysize(16)



* Figure D.11

* T1
reg violence_index c.TREAT_1d##c.drktetr_machia01 if inconsist==0
estimates store index
reg violence_support c.TREAT_1d##c.drktetr_machia01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_1d##c.drktetr_machia01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_1d##c.drktetr_machia01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_1d##c.drktetr_machia01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_1d##c.drktetr_machia01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_1d drktetr_machia01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_3d##c.drktetr_machia01 if inconsist==0
estimates store index
reg violence_support c.TREAT_3d##c.drktetr_machia01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_3d##c.drktetr_machia01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_3d##c.drktetr_machia01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_3d##c.drktetr_machia01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_3d##c.drktetr_machia01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(emerald*0.4 emerald*0.7))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_3d drktetr_machia01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_7d##c.drktetr_machia01 if inconsist==0
estimates store index
reg violence_support c.TREAT_7d##c.drktetr_machia01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_7d##c.drktetr_machia01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_7d##c.drktetr_machia01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_7d##c.drktetr_machia01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_7d##c.drktetr_machia01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_7d drktetr_machia01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT##c.drktetr_machia01 if inconsist==0
estimates store index
reg violence_support c.TREAT##c.drktetr_machia01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT##c.drktetr_machia01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT##c.drktetr_machia01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT##c.drktetr_machia01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT##c.drktetr_machia01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT drktetr_machia01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the killing", size(small) color(emerald)) subtitle("", size(small) color(emerald)) ///
xsize(20) ysize(10) name(AA, replace)

* T2
reg violence_index c.TREAT_mang_1d##c.drktetr_machia01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_1d##c.drktetr_machia01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_1d##c.drktetr_machia01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_1d##c.drktetr_machia01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_1d##c.drktetr_machia01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_1d##c.drktetr_machia01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))), ///
drop(_cons TREAT_mang_1d drktetr_machia01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_3d##c.drktetr_machia01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_3d##c.drktetr_machia01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_3d##c.drktetr_machia01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_3d##c.drktetr_machia01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_3d##c.drktetr_machia01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_3d##c.drktetr_machia01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_3d drktetr_machia01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_7d##c.drktetr_machia01 if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_7d##c.drktetr_machia01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_7d##c.drktetr_machia01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_7d##c.drktetr_machia01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_7d##c.drktetr_machia01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_7d##c.drktetr_machia01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_7d drktetr_machia01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang##c.drktetr_machia01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang##c.drktetr_machia01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang##c.drktetr_machia01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang##c.drktetr_machia01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang##c.drktetr_machia01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang##c.drktetr_machia01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang drktetr_machia01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the arrest", size(small) color(lavender)) subtitle("", size(small) color(lavender)) ///
xsize(20) ysize(10) name(BB, replace)

* T3
reg violence_index c.TREAT_larg_1d##c.drktetr_machia01 if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_1d##c.drktetr_machia01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_1d##c.drktetr_machia01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_1d##c.drktetr_machia01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_1d##c.drktetr_machia01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_1d##c.drktetr_machia01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_1d drktetr_machia01) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_3d##c.drktetr_machia01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_3d##c.drktetr_machia01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_3d##c.drktetr_machia01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_3d##c.drktetr_machia01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_3d##c.drktetr_machia01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_3d##c.drktetr_machia01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_3d drktetr_machia01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_7d##c.drktetr_machia01 PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_7d##c.drktetr_machia01 PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_7d##c.drktetr_machia01 PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_7d##c.drktetr_machia01 PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_7d##c.drktetr_machia01 PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_7d##c.drktetr_machia01 PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_7d drktetr_machia01 PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg##c.drktetr_machia01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg##c.drktetr_machia01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg##c.drktetr_machia01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg##c.drktetr_machia01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg##c.drktetr_machia01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg##c.drktetr_machia01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg drktetr_machia01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before the killing vs. After the arrest", size(small) color(sand)) subtitle("", size(small) color(sand)) ///
xsize(20) ysize(10) name(CC, replace)

*
graph combine AA BB CC, col(1) scheme(lean2) xsize(20) ysize(16)



* Figure D.12

* T1
reg violence_index c.TREAT_1d##c.drktetr_sadism01 if inconsist==0
estimates store index
reg violence_support c.TREAT_1d##c.drktetr_sadism01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_1d##c.drktetr_sadism01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_1d##c.drktetr_sadism01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_1d##c.drktetr_sadism01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_1d##c.drktetr_sadism01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_1d drktetr_sadism01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_3d##c.drktetr_sadism01 if inconsist==0
estimates store index
reg violence_support c.TREAT_3d##c.drktetr_sadism01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_3d##c.drktetr_sadism01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_3d##c.drktetr_sadism01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_3d##c.drktetr_sadism01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_3d##c.drktetr_sadism01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_3d drktetr_sadism01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_7d##c.drktetr_sadism01 if inconsist==0
estimates store index
reg violence_support c.TREAT_7d##c.drktetr_sadism01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_7d##c.drktetr_sadism01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_7d##c.drktetr_sadism01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_7d##c.drktetr_sadism01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_7d##c.drktetr_sadism01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_7d drktetr_sadism01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT##c.drktetr_sadism01 if inconsist==0
estimates store index
reg violence_support c.TREAT##c.drktetr_sadism01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT##c.drktetr_sadism01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT##c.drktetr_sadism01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT##c.drktetr_sadism01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT##c.drktetr_sadism01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT drktetr_sadism01) xline(0, lwidth(0.2) lcolor(emerald)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(emerald)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the killing", size(small) color(emerald)) subtitle("", size(small) color(emerald)) ///
xsize(20) ysize(10) name(AA, replace)

* T2
reg violence_index c.TREAT_mang_1d##c.drktetr_sadism01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_1d##c.drktetr_sadism01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_1d##c.drktetr_sadism01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_1d##c.drktetr_sadism01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_1d##c.drktetr_sadism01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_1d##c.drktetr_sadism01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_1d drktetr_sadism01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_3d##c.drktetr_sadism01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_3d##c.drktetr_sadism01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_3d##c.drktetr_sadism01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_3d##c.drktetr_sadism01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_3d##c.drktetr_sadism01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_3d##c.drktetr_sadism01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_3d drktetr_sadism01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang_7d##c.drktetr_sadism01 if inconsist==0
estimates store index
reg violence_support c.TREAT_mang_7d##c.drktetr_sadism01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang_7d##c.drktetr_sadism01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang_7d##c.drktetr_sadism01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang_7d##c.drktetr_sadism01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang_7d##c.drktetr_sadism01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang_7d drktetr_sadism01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_mang##c.drktetr_sadism01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_mang##c.drktetr_sadism01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_mang##c.drktetr_sadism01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_mang##c.drktetr_sadism01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_mang##c.drktetr_sadism01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_mang##c.drktetr_sadism01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(lavender*0.4 lavender*0.8))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_mang drktetr_sadism01 college) xline(0, lwidth(0.2) lcolor(lavender)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(lavender)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before/After the arrest", size(small) color(lavender)) subtitle("", size(small) color(lavender)) ///
xsize(20) ysize(10) name(BB, replace)

* T3
reg violence_index c.TREAT_larg_1d##c.drktetr_sadism01 if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_1d##c.drktetr_sadism01 if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_1d##c.drktetr_sadism01 if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_1d##c.drktetr_sadism01 if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_1d##c.drktetr_sadism01 if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_1d##c.drktetr_sadism01 if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_1d drktetr_sadism01) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(a, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 1 day", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_3d##c.drktetr_sadism01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_3d##c.drktetr_sadism01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_3d##c.drktetr_sadism01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_3d##c.drktetr_sadism01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_3d##c.drktetr_sadism01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_3d##c.drktetr_sadism01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))), ///
drop(_cons TREAT_larg_3d drktetr_sadism01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(b, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 3 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg_7d##c.drktetr_sadism01 PARTYID_dem if inconsist==0
estimates store index
reg violence_support c.TREAT_larg_7d##c.drktetr_sadism01 PARTYID_dem if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg_7d##c.drktetr_sadism01 PARTYID_dem if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg_7d##c.drktetr_sadism01 PARTYID_dem if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg_7d##c.drktetr_sadism01 PARTYID_dem if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg_7d##c.drktetr_sadism01 PARTYID_dem if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg_7d drktetr_sadism01 PARTYID_dem) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(c, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("+/- 7 days", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
reg violence_index c.TREAT_larg##c.drktetr_sadism01 college if inconsist==0
estimates store index
reg violence_support c.TREAT_larg##c.drktetr_sadism01 college if inconsist==0
estimates store supp
reg violence_justified c.TREAT_larg##c.drktetr_sadism01 college if inconsist==0
estimates store just
reg violence_provoked c.TREAT_larg##c.drktetr_sadism01 college if inconsist==0
estimates store prov
reg violence_usual c.TREAT_larg##c.drktetr_sadism01 college if inconsist==0
estimates store usu
reg violence_charges c.TREAT_larg##c.drktetr_sadism01 college if inconsist==0
estimates store char

coefplot ///
(index, msymbol(|) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(supp, msymbol(circle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(sand*0.4 sand*0.7))) ///
(just, msymbol(triangle) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(prov, msymbol(diamond) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(medsmall) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(usu, msymbol(square) mfcolor(black) mlcolor(black) mlwidth(medium) msize(medium) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))) ///
(char, msymbol(X) mfcolor(black) mlcolor(black) mlwidth(vthin) msize(large) ciopts(lwidth(2.5 2.5 2.5) lcolor(gray*0.2 gray*0.5))), ///
drop(_cons TREAT_larg drktetr_sadism01 college) xline(0, lwidth(0.2) lcolor(sand)) xtitle("", size(vsmall)) name(d, replace) ///
xscale(range(-20 20)) xlabel(-20(5)20) ytitle(, size(small)) xtitle(, size(vsmall)) xlabel(, labsize(tiny) notick) ylabel(none) yscale(lstyle(none)) xscale(lstyle(none)) ///
title ("Full span", size(small) color(sand)) ///
subtitle (" ", size(vsmall)) ///
levels(95 90) ///
xsize(5) ysize(10) legend(pos(6) size(vsmall) rows(6) order(3 "Support for violence (index)" 6 "Could support the act" 9 "Act could be justified" 12 "Was likely provoked" 15 "Happen all the time" 18 "Should face criminal charges")) scheme(lean2)

*
grc1leg2 a b c d, col(4) scheme(lean2) position(9) title("Before the killing vs. After the arrest", size(small) color(sand)) subtitle("", size(small) color(sand)) ///
xsize(20) ysize(10) name(CC, replace)

*
graph combine AA BB CC, col(1) scheme(lean2) xsize(20) ysize(16)




* Figure D.13

* T1, dems
twoway lfitci violence_index daynumber_w2 if PARTYID_dem==1 & TREAT==0, clwidth(medium) clcolor(black) lpattern(solid) color(navy*0.5) legend(off) || ///
lfitci violence_index daynumber_w2 if PARTYID_dem==1 & TREAT==1, clwidth(medium) clcolor(black) color(navy*0.5) lpattern(solid) legend(off) || ///
scatter violence_index daynumber_w2 if PARTYID_dem==1, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(29, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the killing (Dems)", size(small) color(black)) ///
xsize(13) ysize(13) name(a, replace)

* T2, dems
twoway lfitci violence_index daynumber_w2 if PARTYID_dem==1 & TREAT_mang==0, clwidth(medium) clcolor(black) lpattern(solid) color(navy*0.5) legend(off) || ///
lfitci violence_index daynumber_w2 if PARTYID_dem==1 & TREAT_mang==1, clwidth(medium) clcolor(black) color(navy*0.5) lpattern(solid) legend(off) || ///
scatter violence_index daynumber_w2 if PARTYID_dem==1, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(34, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the arrest (Dems)", size(small) color(black)) ///
xsize(13) ysize(13) name(b, replace)

* T1, reps
twoway lfitci violence_index daynumber_w2 if PARTYID_dem==0 & TREAT==0, clwidth(medium) clcolor(black) lpattern(solid) color(cranberry*0.5) legend(off) || ///
lfitci violence_index daynumber_w2 if PARTYID_dem==0 & TREAT==1, clwidth(medium) clcolor(black) color(cranberry*0.5) lpattern(solid) legend(off) || ///
scatter violence_index daynumber_w2 if PARTYID_dem==0, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(29, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the killing (Reps)", size(small) color(black)) ///
xsize(13) ysize(13) name(c, replace)

* T2, reps
twoway lfitci violence_index daynumber_w2 if PARTYID_dem==0 & TREAT_mang==0, clwidth(medium) clcolor(black) lpattern(solid) color(cranberry*0.5) legend(off) || ///
lfitci violence_index daynumber_w2 if PARTYID_dem==0 & TREAT_mang==1, clwidth(medium) clcolor(black) color(cranberry*0.5) lpattern(solid) legend(off) || ///
scatter violence_index daynumber_w2 if PARTYID_dem==0, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(34, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the arrest (Reps)", size(small) color(black)) ///
xsize(13) ysize(13) name(d, replace)

*
graph combine a b c d, col(2) scheme(lean2) xsize(20) ysize(20)



* Figure D.14

* T1, dems
twoway lfitci violence_support daynumber_w2 if PARTYID_dem==1 & TREAT==0, clwidth(medium) clcolor(black) lpattern(solid) color(navy*0.5) legend(off) || ///
lfitci violence_support daynumber_w2 if PARTYID_dem==1 & TREAT==1, clwidth(medium) clcolor(black) color(navy*0.5) lpattern(solid) legend(off) || ///
scatter violence_support daynumber_w2 if PARTYID_dem==1, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(29, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the killing (Dems)", size(small) color(black)) ///
xsize(13) ysize(13) name(a, replace)

* T2, dems
twoway lfitci violence_support daynumber_w2 if PARTYID_dem==1 & TREAT_mang==0, clwidth(medium) clcolor(black) lpattern(solid) color(navy*0.5) legend(off) || ///
lfitci violence_support daynumber_w2 if PARTYID_dem==1 & TREAT_mang==1, clwidth(medium) clcolor(black) color(navy*0.5) lpattern(solid) legend(off) || ///
scatter violence_support daynumber_w2 if PARTYID_dem==1, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(34, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the arrest (Dems)", size(small) color(black)) ///
xsize(13) ysize(13) name(b, replace)

* T1, reps
twoway lfitci violence_support daynumber_w2 if PARTYID_dem==0 & TREAT==0, clwidth(medium) clcolor(black) lpattern(solid) color(cranberry*0.5) legend(off) || ///
lfitci violence_support daynumber_w2 if PARTYID_dem==0 & TREAT==1, clwidth(medium) clcolor(black) color(cranberry*0.5) lpattern(solid) legend(off) || ///
scatter violence_support daynumber_w2 if PARTYID_dem==0, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(29, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the killing (Reps)", size(small) color(black)) ///
xsize(13) ysize(13) name(c, replace)

* T2, reps
twoway lfitci violence_support daynumber_w2 if PARTYID_dem==0 & TREAT_mang==0, clwidth(medium) clcolor(black) lpattern(solid) color(cranberry*0.5) legend(off) || ///
lfitci violence_support daynumber_w2 if PARTYID_dem==0 & TREAT_mang==1, clwidth(medium) clcolor(black) color(cranberry*0.5) lpattern(solid) legend(off) || ///
scatter violence_support daynumber_w2 if PARTYID_dem==0, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(34, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the arrest (Reps)", size(small) color(black)) ///
xsize(13) ysize(13) name(d, replace)

*
graph combine a b c d, col(2) scheme(lean2) xsize(20) ysize(20)



* Figure D.15

* T1, dems
twoway lfitci violence_justified daynumber_w2 if PARTYID_dem==1 & TREAT==0, clwidth(medium) clcolor(black) lpattern(solid) color(navy*0.5) legend(off) || ///
lfitci violence_justified daynumber_w2 if PARTYID_dem==1 & TREAT==1, clwidth(medium) clcolor(black) color(navy*0.5) lpattern(solid) legend(off) || ///
scatter violence_justified daynumber_w2 if PARTYID_dem==1, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(29, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the killing (Dems)", size(small) color(black)) ///
xsize(13) ysize(13) name(a, replace)

* T2, dems
twoway lfitci violence_justified daynumber_w2 if PARTYID_dem==1 & TREAT_mang==0, clwidth(medium) clcolor(black) lpattern(solid) color(navy*0.5) legend(off) || ///
lfitci violence_justified daynumber_w2 if PARTYID_dem==1 & TREAT_mang==1, clwidth(medium) clcolor(black) color(navy*0.5) lpattern(solid) legend(off) || ///
scatter violence_justified daynumber_w2 if PARTYID_dem==1, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(34, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the arrest (Dems)", size(small) color(black)) ///
xsize(13) ysize(13) name(b, replace)

* T1, reps
twoway lfitci violence_justified daynumber_w2 if PARTYID_dem==0 & TREAT==0, clwidth(medium) clcolor(black) lpattern(solid) color(cranberry*0.5) legend(off) || ///
lfitci violence_justified daynumber_w2 if PARTYID_dem==0 & TREAT==1, clwidth(medium) clcolor(black) color(cranberry*0.5) lpattern(solid) legend(off) || ///
scatter violence_justified daynumber_w2 if PARTYID_dem==0, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(29, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the killing (Reps)", size(small) color(black)) ///
xsize(13) ysize(13) name(c, replace)

* T2, reps
twoway lfitci violence_justified daynumber_w2 if PARTYID_dem==0 & TREAT_mang==0, clwidth(medium) clcolor(black) lpattern(solid) color(cranberry*0.5) legend(off) || ///
lfitci violence_justified daynumber_w2 if PARTYID_dem==0 & TREAT_mang==1, clwidth(medium) clcolor(black) color(cranberry*0.5) lpattern(solid) legend(off) || ///
scatter violence_justified daynumber_w2 if PARTYID_dem==0, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(34, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the arrest (Reps)", size(small) color(black)) ///
xsize(13) ysize(13) name(d, replace)

*
graph combine a b c d, col(2) scheme(lean2) xsize(20) ysize(20)




* Figure D.16

* T1, dems
twoway lfitci violence_provoked daynumber_w2 if PARTYID_dem==1 & TREAT==0, clwidth(medium) clcolor(black) lpattern(solid) color(navy*0.5) legend(off) || ///
lfitci violence_provoked daynumber_w2 if PARTYID_dem==1 & TREAT==1, clwidth(medium) clcolor(black) color(navy*0.5) lpattern(solid) legend(off) || ///
scatter violence_provoked daynumber_w2 if PARTYID_dem==1, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(29, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the killing (Dems)", size(small) color(black)) ///
xsize(13) ysize(13) name(a, replace)

* T2, dems
twoway lfitci violence_provoked daynumber_w2 if PARTYID_dem==1 & TREAT_mang==0, clwidth(medium) clcolor(black) lpattern(solid) color(navy*0.5) legend(off) || ///
lfitci violence_provoked daynumber_w2 if PARTYID_dem==1 & TREAT_mang==1, clwidth(medium) clcolor(black) color(navy*0.5) lpattern(solid) legend(off) || ///
scatter violence_provoked daynumber_w2 if PARTYID_dem==1, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(34, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the arrest (Dems)", size(small) color(black)) ///
xsize(13) ysize(13) name(b, replace)

* T1, reps
twoway lfitci violence_provoked daynumber_w2 if PARTYID_dem==0 & TREAT==0, clwidth(medium) clcolor(black) lpattern(solid) color(cranberry*0.5) legend(off) || ///
lfitci violence_provoked daynumber_w2 if PARTYID_dem==0 & TREAT==1, clwidth(medium) clcolor(black) color(cranberry*0.5) lpattern(solid) legend(off) || ///
scatter violence_provoked daynumber_w2 if PARTYID_dem==0, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(29, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the killing (Reps)", size(small) color(black)) ///
xsize(13) ysize(13) name(c, replace)

* T2, reps
twoway lfitci violence_provoked daynumber_w2 if PARTYID_dem==0 & TREAT_mang==0, clwidth(medium) clcolor(black) lpattern(solid) color(cranberry*0.5) legend(off) || ///
lfitci violence_provoked daynumber_w2 if PARTYID_dem==0 & TREAT_mang==1, clwidth(medium) clcolor(black) color(cranberry*0.5) lpattern(solid) legend(off) || ///
scatter violence_provoked daynumber_w2 if PARTYID_dem==0, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(34, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the arrest (Reps)", size(small) color(black)) ///
xsize(13) ysize(13) name(d, replace)

*
graph combine a b c d, col(2) scheme(lean2) xsize(20) ysize(20)



* Figure D.17

* T1, dems
twoway lfitci violence_usual daynumber_w2 if PARTYID_dem==1 & TREAT==0, clwidth(medium) clcolor(black) lpattern(solid) color(navy*0.5) legend(off) || ///
lfitci violence_usual daynumber_w2 if PARTYID_dem==1 & TREAT==1, clwidth(medium) clcolor(black) color(navy*0.5) lpattern(solid) legend(off) || ///
scatter violence_usual daynumber_w2 if PARTYID_dem==1, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(29, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the killing (Dems)", size(small) color(black)) ///
xsize(13) ysize(13) name(a, replace)

* T2, dems
twoway lfitci violence_usual daynumber_w2 if PARTYID_dem==1 & TREAT_mang==0, clwidth(medium) clcolor(black) lpattern(solid) color(navy*0.5) legend(off) || ///
lfitci violence_usual daynumber_w2 if PARTYID_dem==1 & TREAT_mang==1, clwidth(medium) clcolor(black) color(navy*0.5) lpattern(solid) legend(off) || ///
scatter violence_usual daynumber_w2 if PARTYID_dem==1, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(34, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the arrest (Dems)", size(small) color(black)) ///
xsize(13) ysize(13) name(b, replace)

* T1, reps
twoway lfitci violence_usual daynumber_w2 if PARTYID_dem==0 & TREAT==0, clwidth(medium) clcolor(black) lpattern(solid) color(cranberry*0.5) legend(off) || ///
lfitci violence_usual daynumber_w2 if PARTYID_dem==0 & TREAT==1, clwidth(medium) clcolor(black) color(cranberry*0.5) lpattern(solid) legend(off) || ///
scatter violence_usual daynumber_w2 if PARTYID_dem==0, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(29, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the killing (Reps)", size(small) color(black)) ///
xsize(13) ysize(13) name(c, replace)

* T2, reps
twoway lfitci violence_usual daynumber_w2 if PARTYID_dem==0 & TREAT_mang==0, clwidth(medium) clcolor(black) lpattern(solid) color(cranberry*0.5) legend(off) || ///
lfitci violence_usual daynumber_w2 if PARTYID_dem==0 & TREAT_mang==1, clwidth(medium) clcolor(black) color(cranberry*0.5) lpattern(solid) legend(off) || ///
scatter violence_usual daynumber_w2 if PARTYID_dem==0, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(34, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the arrest (Reps)", size(small) color(black)) ///
xsize(13) ysize(13) name(d, replace)

*
graph combine a b c d, col(2) scheme(lean2) xsize(20) ysize(20)



* Figure D.18

* T1, dems
twoway lfitci violence_charges daynumber_w2 if PARTYID_dem==1 & TREAT==0, clwidth(medium) clcolor(black) lpattern(solid) color(navy*0.5) legend(off) || ///
lfitci violence_charges daynumber_w2 if PARTYID_dem==1 & TREAT==1, clwidth(medium) clcolor(black) color(navy*0.5) lpattern(solid) legend(off) || ///
scatter violence_charges daynumber_w2 if PARTYID_dem==1, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(29, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the killing (Dems)", size(small) color(black)) ///
xsize(13) ysize(13) name(a, replace)

* T2, dems
twoway lfitci violence_charges daynumber_w2 if PARTYID_dem==1 & TREAT_mang==0, clwidth(medium) clcolor(black) lpattern(solid) color(navy*0.5) legend(off) || ///
lfitci violence_charges daynumber_w2 if PARTYID_dem==1 & TREAT_mang==1, clwidth(medium) clcolor(black) color(navy*0.5) lpattern(solid) legend(off) || ///
scatter violence_charges daynumber_w2 if PARTYID_dem==1, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(34, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the arrest (Dems)", size(small) color(black)) ///
xsize(13) ysize(13) name(b, replace)

* T1, reps
twoway lfitci violence_charges daynumber_w2 if PARTYID_dem==0 & TREAT==0, clwidth(medium) clcolor(black) lpattern(solid) color(cranberry*0.5) legend(off) || ///
lfitci violence_charges daynumber_w2 if PARTYID_dem==0 & TREAT==1, clwidth(medium) clcolor(black) color(cranberry*0.5) lpattern(solid) legend(off) || ///
scatter violence_charges daynumber_w2 if PARTYID_dem==0, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(29, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the killing (Reps)", size(small) color(black)) ///
xsize(13) ysize(13) name(c, replace)

* T2, reps
twoway lfitci violence_charges daynumber_w2 if PARTYID_dem==0 & TREAT_mang==0, clwidth(medium) clcolor(black) lpattern(solid) color(cranberry*0.5) legend(off) || ///
lfitci violence_charges daynumber_w2 if PARTYID_dem==0 & TREAT_mang==1, clwidth(medium) clcolor(black) color(cranberry*0.5) lpattern(solid) legend(off) || ///
scatter violence_charges daynumber_w2 if PARTYID_dem==0, msize(vtiny) msymbol(circle) mlwidth(vthin) scheme(lean2) jitter(5) ///
xscale(range(0 41)) xlabel(0(5)41, labsize(vsmall)) xtitle("Day in survey wave", size(vsmall)) xline(34, lwidth(0.3) lcolor(black) lpattern(dash)) ///
yscale(range(0 100)) ylabel(0(20)100, labsize(vsmall)) ytitle("", size(small))  ///
title("Before/After the arrest (Reps)", size(small) color(black)) ///
xsize(13) ysize(13) name(d, replace)

*
graph combine a b c d, col(2) scheme(lean2) xsize(20) ysize(20)








